Option Strict On
Option Explicit On
Friend Class clsPrestacion
	Implements _IEntidad
	
	'##ModelId=463F88F40223
	Private MyOID As clsOID
	'##ModelId=463F88F40232
	Private MyCodigo As String
	'##ModelId=463F88F40242
	Private MyDescripcion As String
	'##ModelId=463F88F40251
	Private MyHomologacion As String
	'##ModelId=463F88F40261
	Private MyEspecialidad As String
	'##ModelId=463F88F40262
	Private MyPrecioBasico As String
	
	Private MyPrecioOS As String
	
	Private MyObrasSociales As Collection
	
	Private MyActiva As Boolean
	'##ModelId=463F88F40271
	
	'##ModelId=463F88F40281
	Private Property IEntidad_OID() As clsOID Implements _IEntidad.OID
		Get
            Return MyOID
		End Get
		Set(ByVal Value As clsOID)
			MyOID = Value
		End Set
	End Property
	
	
	'##ModelId=463F88F40281
	Public Property ObrasSociales() As Collection
		Get
            Return MyObrasSociales
		End Get
		Set(ByVal Value As Collection)
			MyObrasSociales = Value
		End Set
	End Property
	
	
	
	'##ModelId=463F88F40281
	Public Property Activa() As Boolean
		Get
            Return MyActiva
		End Get
		Set(ByVal Value As Boolean)
			MyActiva = Value
		End Set
	End Property
	
	'##ModelId=463F88F402A4
	
	'##ModelId=463F88F40293
	Public Property codigo() As String
		Get
            Return MyCodigo
		End Get
		Set(ByVal Value As String)
			MyCodigo = Value
		End Set
	End Property
	
	'##ModelId=463F88F402C0
	
	'##ModelId=463F88F402B3
	Public Property Homologacion() As String
		Get
            Return MyHomologacion
		End Get
		Set(ByVal Value As String)
			MyHomologacion = Value
		End Set
	End Property
	'##ModelId=463F88F402D3
	
	'##ModelId=463F88F402C5
	Public Property Especialidad() As String
		Get
            Return MyEspecialidad
		End Get
		Set(ByVal Value As String)
			MyEspecialidad = Value
		End Set
	End Property
	
	'##ModelId=463F88F402EF
	
	'##ModelId=463F88F402E2
	Public Property Descripcion() As String
		Get
            Return MyDescripcion
		End Get
		Set(ByVal Value As String)
			MyDescripcion = Value
		End Set
	End Property
	
	'##ModelId=463F88F4030D
	
	'##ModelId=463F88F402FD
	Public Property PrecioBasico() As String
		Get
            Return MyPrecioBasico
		End Get
		Set(ByVal Value As String)
			MyPrecioBasico = Value
		End Set
	End Property
	
	
	Public Property PrecioOS() As String
		Get
            Return MyPrecioOS
		End Get
		Set(ByVal Value As String)
			MyPrecioOS = Value
		End Set
	End Property
	
	'##ModelId=463F88F40291
	Public Sub Constructor(ByRef MyClave As String)
		MyOID = NewOID(MyClave, tipoPRESTACION)
	End Sub
End Class